home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 43 / Amiga Format CD43 (1999)(Future Publishing)(GB)(Track 1 of 2)[!][issue 1999-09].iso / -serious- / graphics / fxforge / distortfx / fakeperspective < prev    next >
Text File  |  1999-06-15  |  899b  |  43 lines
  1. Filter Factory Plugin Information:
  2.  
  3. FILENAME: PERSPECT.8BF
  4.  
  5. CATEGORY: 
  6. Balder Olrik
  7.  
  8. TITLE:    
  9. Perspective
  10.  
  11. COPYRIGHT:
  12. Copyright ) 1997 Balder Olrik
  13.  
  14. AUTHOR:   
  15. Balder Olrik
  16.  
  17. Map 0: [Map 0:]
  18. Map 1: [Map 1:]
  19. Map 2: [Map 2:]
  20. Map 3: [Map 3:]
  21.  
  22. Control 0: [Top Sidevways :]
  23. Control 1: [Top Bend :]
  24. Control 2: [Bottom Sidevways :]
  25. Control 3: [Bottom Bend  :]
  26. Control 4: [Left Up'n Down :]
  27. Control 5: [Left Bend  :]
  28. Control 6: [Right Up'n Down :]
  29. Control 7: [Right Bend  :]
  30.  
  31. R=
  32. put(( (val(3,0-( (X/2)-x),(X/2)-x)*y/Y)+((val(1,0-((X/2)-x),(X/2)-x))*(Y-y)/Y)+ val(2,0-y, y) + val(0,0-(Y-y),Y- y) ) ,0),put(( (val(7,0-( (Y/2)-y),(Y/2)-y)*x/X)+((val(5,0-((Y/2)-y),(Y/2)-y))*(X-x)/X)+ val(6,0-x, x) + val(4,0-(X-x),X- x) ) ,1),put(((get(0)*x/X)+X-get(0))*x/X,0), put(((get(1)*y/Y)+Y-get(1))*y/Y,1),src(get(0),get(1),z)  
  33.  
  34. G=
  35.  src(get(0 ),get(1),z)   
  36.  
  37. B=
  38.  src(get(0 ),get(1),z)   
  39.  
  40. A=
  41. src(get(0),get(1),z)   
  42.  
  43.